# R 语言 散点图 plot(x,y,main,xlab,ylab,xlim,ylim,axes)

# x 其值为水平坐标的数据集
# y 其值为垂直坐标的数据集
# main 图形的图块
# xlab 水平坐标的标签
# ylab 垂直坐标的标签
# xlim 绘制x轴的极值
# ylim 绘制y轴的极值
# axea 是否绘制两个轴

input <- mtcars[,c("wt","mpg")];
print( input );

# 绘制散点图
png(file="sctterplot.png");

plot(x=input$wt,y=input$mpg,
     
     xlab="Weight",
     ylab="Milage",
     xlim=c(2.5,5),
     ylim=c(15,30),
     main="Weight vs Milage"
     
     )

dev.off()

# 散点图矩阵 pairs(formula,data )

# formula 表示使用对应的一系列变量
# data 表示从变量中获取的数据集

png(file="scatter_matrix.png")

pairs(~wt+mpg+disp+cyl,data=mtcars,
      
      main="Scatterolt Matrix");

const <- mtcars;
print( const$wt,const$mpg )

dev.off();